Dim Path As String = "c:/4Grabber/"
  If Not Directory.Exists(Path) Then
    Directory.CreateDirectory(Path)
  End If

start:
  Dim wc As New System.Net.WebClient 'Dim New WebClient
  Dim sauce As String = wc.DownloadString("http://boards.4chan.org/b/") 'Dim Source Code Download (/b/)
  Dim sauceSplit() As String = sauce.Split(Chr(34)) 'Split quotation marks

  For i = 0 To sauceSplit.Count - 1 'Begin loop for split count
    If sauceSplit(i).Contains(".jpg") And sauceSplit(i).Contains("http://") Then 'Get image splits
    If sauceSplit(i).Contains("width") Then 'Check it's not an advert
    ElseIf Not sauceSplit(i).Contains("static") Then 'Check it's not a banner
    Dim fileNAMEsplit() As String = (sauceSplit(i)).Split("/") 'Split image URL to get filename
    Dim FileNAME As String = fileNAMEsplit(fileNAMEsplit.Count - 1) 'Get filename
    wc.DownloadFile(sauceSplit(i), "c:\4Grabber\" & FileNAME) 'Download URL as Filename
    'MsgBox(sauceSplit(i)) 'Messagebox it so you can see it is working :)
    End If
    End If
  Next 'Loop again
  GoTo start 'Re-download page source and start again